home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Atari Compendium
/
The Atari Compendium (Toad Computers) (1994).iso
/
files
/
umich
/
falcon
/
programm.ing
/
falclib2.lzh
/
ROUTS
/
LOADFILE.S
< prev
next >
Wrap
Text File
|
1994-08-12
|
404b
|
32 lines
*
* Laddar in en fil och packar eventuellt upp den (ice 2.40).
* a5.l=adr. till nollavslutat filnamn
* a6.l=dest
* d7.l=fillängd
*
include gem.s
include ice.s
@loadfile
move #0,-(sp)
move.l a5,-(sp)
@gemdos $3d,8
move d0,d6
move.l a6,-(sp)
move.l d7,-(sp)
move d6,-(sp)
@gemdos $3f,12
move d6,-(sp)
@gemdos $3e,4
move.l a6,a0
bsr @icedecrunch
rts